home *** CD-ROM | disk | FTP | other *** search
-
-
-
-
-
- OPEN(REPORT)
- LOOP UNTIL DONE#
- SAVE_LINE# = MEM:LINE
- LAST_REC# = POINTER(LABELS)
- IF PRE:COMPANY <> '' ! IF THEN STRUCTURE STARTS HERE
- PRINT(RPT:DETAIL1) ! |
- ELSE ! |
- PRINT(RPT:DETAIL2) ! |
- . ! IF THEN STRUCTURE ENDS HERE
- DO CHECK_PAGE
- DO NEXT_RECORD
- .
-
-
-
-
-
-
-
- LABELS4.CLA 65:62 CHR OVR ZON IND CAP
-